home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / glass / glass.lha / GLASS / tmpas / testdata < prev    next >
Text File  |  1990-10-02  |  994b  |  56 lines

  1. [
  2. || Comment should also be possible
  3. (TestInt 12)
  4. ,TestChar 'a'
  5. || ,TestString "bla"
  6. ,TestTuple (1,2)
  7. ,(TestBool (True))
  8. ,TestBool False
  9. ,TestNum 1.2
  10. ,TestNum -1.2345e-20
  11. ,TestList
  12. [
  13.     (TestNum 12)
  14.     ,(TestNum (-1))
  15.     ,(TestNum (1.0))
  16.     ,(TestNum (-4.2))
  17.     ,(TestNum (-1e12))
  18.     ,(TestNum (1e12))
  19.     ,(TestNum (-1e-12))
  20.     ,(TestNum (    (1e-12)))
  21.     ,(TestNum (1.2e24))
  22. ]
  23. ||,(TestString "\0\4\7\b\t\n\13\f\r\16 \"#\'().019:;?@AZ[\\]^_`abyz~\177\376\377")
  24. ,(TestChar '\0')
  25. ,(TestChar '\1')
  26. ,(TestChar '\7')
  27. ,(TestChar '\b')
  28. ,(TestChar '\t')
  29. ,(TestChar '\n')
  30. ,(TestChar '\13')
  31. ,(TestChar '\f')
  32. ,(TestChar '\r')
  33. ,(TestChar '\16')
  34. ,(TestChar ' ')
  35. ,(TestChar '\"')
  36. ,(TestChar '#')
  37. ,(TestChar '&')
  38. ,(TestChar '\'')
  39. ,(TestChar '/')
  40. ,(TestChar '0')
  41. ,(TestChar '9')
  42. ,(TestChar 'A')
  43. ,(TestChar 'Z')
  44. ,(TestChar '^')
  45. ,(TestChar '_')
  46. ,(TestChar '`')
  47. ,(TestChar 'a')
  48. ,(TestChar 'z')
  49. ,(TestChar '~')
  50. ,(TestChar '\177')
  51. ,(TestChar '\200')
  52. ,(TestChar '\277')
  53. ,(TestChar '\300')
  54. ,(TestChar '\377')
  55. ]
  56.